Freelog 65/Freelog065.iso/BAS/Graphisme/Imagetoavi/imagetoavi1.0.exe/{app}/ImageToAVI.exe/0/RCDATA/TAVICOMPILEFORM/TAVICOMPILEFORM.txt

Text File | 2005-01-10 | 25KB | 829 lines

object AVICompileForm: TAVICompileForm
  Left = 341
  Top = 112
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'ImageToAVI - Verison 1.0 - Create an AVI from a List of Images'
  ClientHeight = 504
  ClientWidth = 742
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnMouseMove = FormMouseMove
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object BackImage: TImage
    Left = 328
    Top = 392
    Width = 65
    Height = 65
    Picture.Data = {<image001.jpg>}
    Stretch = True
    Visible = False
  end
  object Bevel1: TBevel
    Left = 571
    Top = 312
    Width = 152
    Height = 139
  end
  object Label1: TLabel
    Left = 16
    Top = 328
    Width = 96
    Height = 13
    Caption = '&Frames Per Second:'
    FocusControl = FramesPerSecondEdit
    Transparent = True
  end
  object Label2: TLabel
    Left = 192
    Top = 328
    Width = 31
    Height = 13
    Caption = '&Width:'
    FocusControl = WidthEdit
    Transparent = True
  end
  object Label3: TLabel
    Left = 304
    Top = 328
    Width = 34
    Height = 13
    Caption = '&Height:'
    FocusControl = HeightEdit
    Transparent = True
  end
  object IncludeAudioChkBoxLbl: TLabel
    Left = 29
    Top = 261
    Width = 71
    Height = 13
    Cursor = crHandPoint
    Caption = '  &Include Audio'
    FocusControl = IncludeAudioChkBox
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
    OnClick = IncludeAudioChkBoxLblClick
  end
  object SortChkBoxLbl: TLabel
    Left = 629
    Top = 109
    Width = 76
    Height = 13
    Cursor = crHandPoint
    Caption = '  Sort &Backward'
    FocusControl = SortBackChkBox
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
    OnClick = SortChkBoxLblClick
  end
  object Image1: TImage
    Left = 572
    Top = 313
    Width = 149
    Height = 136
    Stretch = True
  end
  object AspectChkBoxLbl: TLabel
    Left = 573
    Top = 173
    Width = 110
    Height = 13
    Cursor = crHandPoint
    Caption = '  Maintain Aspect &Ratio'
    FocusControl = AspectChkBox
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
    OnClick = AspectChkBoxLblClick
  end
  object ZoomChkBoxLbl: TLabel
    Left = 573
    Top = 189
    Width = 146
    Height = 13
    Cursor = crHandPoint
    Caption = '  &Zoom In (expand smaller pics)'
    FocusControl = ZoomInChkBox
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
    OnClick = ZoomChkBoxLblClick
  end
  object AVIBackImage: TImage
    Left = 456
    Top = 416
    Width = 49
    Height = 49
    Visible = False
  end
  object Label4: TLabel
    Left = 560
    Top = 224
    Width = 105
    Height = 13
    Caption = 'Border Size Width (%):'
    FocusControl = BorderSizeWidthEdit
    Transparent = True
  end
  object BuffImage: TImage
    Left = 408
    Top = 416
    Width = 49
    Height = 49
    Visible = False
  end
  object DirLbl: TLabel
    Left = 208
    Top = 400
    Width = 27
    Height = 13
    Caption = 'DirLbl'
    Visible = False
  end
  object Label5: TLabel
    Left = 560
    Top = 248
    Width = 108
    Height = 13
    Caption = 'Border Size Height (%):'
    FocusControl = BorderSizeHeightEdit
    Transparent = True
  end
  object Label6: TLabel
    Left = 16
    Top = 360
    Width = 91
    Height = 13
    Caption = '&Repeat each fra&me'
    FocusControl = RepeatValueEdit
    Transparent = True
  end
  object Label7: TLabel
    Left = 184
    Top = 360
    Width = 33
    Height = 13
    Caption = 'time(s).'
    Transparent = True
  end
  object Label8: TLabel
    Left = 248
    Top = 360
    Width = 91
    Height = 13
    Caption = 'Repea&t each frame'
    FocusControl = RepeatSecondsEdit
    Transparent = True
  end
  object Label9: TLabel
    Left = 416
    Top = 360
    Width = 49
    Height = 13
    Caption = 'second(s).'
    Transparent = True
  end
  object ProgressImage: TImage
    Left = 8
    Top = 448
    Width = 248
    Height = 15
    AutoSize = True
    Picture.Data = {<image002.jpg>}
    Visible = False
  end
  object MyDocsDirLbl: TLabel
    Left = 248
    Top = 400
    Width = 66
    Height = 13
    Caption = 'MyDocsDirLbl'
    Visible = False
  end
  object Label10: TLabel
    Left = 560
    Top = 280
    Width = 57
    Height = 13
    Caption = 'Pi&xel format:'
    FocusControl = PixelFormCBox
    Transparent = True
    OnMouseMove = Label10MouseMove
  end
  object Status1Image: TImage
    Left = 408
    Top = 384
    Width = 81
    Height = 41
    Picture.Data = {<image003.jpg>}
    Visible = False
  end
  object Status2Image: TImage
    Left = 488
    Top = 384
    Width = 73
    Height = 41
    Picture.Data = {<image004.jpg>}
    Visible = False
  end
  object StopBtn: TBitBtn
    Left = 14
    Top = 416
    Width = 131
    Height = 25
    Caption = 'Stop   '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 22
    Visible = False
    OnClick = StopBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777778777777777777789987777777777799999987777777799999999
      8777777999999999987777799999999998777799999999999987779999999999
      9977777999999999987777799999999997777777999999997777777779999997
      7777777777799777777777777777777777777777777777777777}
  end
  object AddBtn: TBitBtn
    Left = 568
    Top = 16
    Width = 153
    Height = 25
    Caption = 'Ad&d Image Files...'
    TabOrder = 0
    OnClick = AddBtnClick
    OnMouseMove = AddBtnMouseMove
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777788887
      7777777777444487777777777744448777777777774444877777777777444487
      7777778888444488888874444444444444487444444444444448744444444444
      4448744444444444444777777744448777777777774444877777777777444487
      7777777777444487777777777744447777777777777777777777}
  end
  object CompileBtn: TBitBtn
    Left = 14
    Top = 416
    Width = 131
    Height = 25
    Caption = '&Compile Images   '
    Default = True
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clGreen
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 21
    OnClick = CompileBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      777777777777877777777777778AA877777777777AAAAAA877777777AAAAAAAA
      8777777AAAAAAAAAA877777AAAAAAAAAA87777AAAAAAAAAAAA8777AAAAAAAAAA
      AA77777AAAAAAAAAA877777AAAAAAAAAA7777777AAAAAAAA777777777AAAAAA7
      77777777777AA777777777777777777777777777777777777777}
  end
  object DeleteBtn: TBitBtn
    Left = 568
    Top = 48
    Width = 153
    Height = 25
    Caption = 'D&elete Selected Image(s)'
    Enabled = False
    TabOrder = 1
    OnClick = DeleteBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777070707070
      7777777767474747777777707070707077777777677747477777777070707070
      7777777767774747777777707070707077777777677747477777777070707070
      7777777767774747777777707070707077777707070707070777777677747474
      7777770707070707077777777074707777777777770707777777}
  end
  object StringGrid: TStringGrid
    Left = 10
    Top = 8
    Width = 535
    Height = 241
    Hint =
      'Click and hold the left mouse button on the row tabs to move a r' +
      'ow.'
    Color = clBtnFace
    ColCount = 2
    DefaultColWidth = 1000
    DefaultRowHeight = 15
    Enabled = False
    RowCount = 1
    FixedRows = 0
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowMoving, goRowSelect, goThumbTracking]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 23
    OnClick = StringGridClick
    OnDblClick = StringGridDblClick
    OnMouseMove = StringGridMouseMove
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 466
    Width = 742
    Height = 19
    Color = clInactiveCaption
    Panels = <
      item
        Style = psOwnerDraw
        Text = 'Ready'
        Width = 250
      end
      item
        Style = psOwnerDraw
        Text = 'Selected Image: None.'
        Width = 150
      end
      item
        Style = psOwnerDraw
        Text = 'Total Images: 0'
        Width = 150
      end
      item
        Style = psOwnerDraw
        Text = 'Total Frames: ?'
        Width = 50
      end>
    SimplePanel = False
    OnDrawPanel = StatusBar1DrawPanel
  end
  object SortBtn: TBitBtn
    Left = 568
    Top = 80
    Width = 153
    Height = 25
    Caption = '&Sort List'
    Enabled = False
    TabOrder = 2
    OnClick = SortBtnClick
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      1800000000000003000000000000000000000000000000000000C0C0C0C0C0C0
      808080808080808080808080808080808080C0C0C0C0C0C0C0C0C0C0C0C08080
      80C0C0C0C0C0C0C0C0C0C0C0C000008000008000008000008000008000008080
      8080C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0000080
      000080808080C0C0C0C0C0C0000080C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
      80808080C0C0C0C0C0C0C0C0C0C0C0C0000080000080808080C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0FF0000FF0000FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0000080000080808080C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF00
      00808080808080C0C0C0C0C0C0C0C0C0808080C0C0C000008000008080808080
      8080C0C0C0FF0000FF0000FF0000FF0000FF0000C0C0C0C0C0C0C0C0C0000080
      808080808080808080000080000080808080C0C0C0C0C0C0C0C0C0FF00008080
      80C0C0C0C0C0C0C0C0C0C0C0C0000080000080000080000080000080000080C0
      C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      808080808080808080C0C0C0808080808080808080C0C0C0C0C0C0FF00008080
      80C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000C0C0C080800080800080
      8000C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      808000808080C0C0C0C0C0C0808000808080C0C0C0C0C0C0C0C0C0FF00008080
      80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000808000808000C0
      C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0808000C0C0C0808000808080C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
      80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0808000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
      80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0FF0000C0C0C0C0C0C0C0C0C0C0C0C0}
  end
  object SortBackChkBox: TCheckBox
    Left = 616
    Top = 109
    Width = 13
    Height = 13
    Cursor = crHandPoint
    TabOrder = 3
  end
  object OpenAudioPathBtn: TBitBtn
    Left = 112
    Top = 256
    Width = 97
    Height = 25
    Caption = 'Open A&udio...'
    Enabled = False
    TabOrder = 11
    OnClick = OpenAudioPathBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777774488777777777777444877777777777777487887
      7777777777484488777777777748444877777777774877487777777777487748
      7777777777447748777777777747474877777777777474487777777777774748
      7777777777777447777777777777777777777777777777777777}
    Spacing = 2
  end
  object AudioPathEdit: TEdit
    Left = 216
    Top = 258
    Width = 329
    Height = 21
    Color = clBtnFace
    ReadOnly = True
    TabOrder = 12
    Text = '(none)'
  end
  object IncludeAudioChkBox: TCheckBox
    Left = 16
    Top = 261
    Width = 13
    Height = 13
    Cursor = crHandPoint
    TabOrder = 10
    OnClick = IncludeAudioChkBoxClick
  end
  object OutputPathBtn: TBitBtn
    Left = 16
    Top = 288
    Width = 97
    Height = 25
    Caption = '&Output File...'
    TabOrder = 13
    OnClick = OutputPathBtnClick
    OnMouseMove = OutputPathBtnMouseMove
  end
  object OutputEdit: TEdit
    Left = 120
    Top = 290
    Width = 425
    Height = 21
    Color = clBtnFace
    ReadOnly = True
    TabOrder = 14
    Text = 'C:\output.avi'
    OnMouseMove = OutputPathBtnMouseMove
  end
  object FramesPerSecondEdit: TEdit
    Left = 120
    Top = 325
    Width = 57
    Height = 21
    TabOrder = 15
    Text = '29.970'
    OnChange = FramesPerSecondEditChange
    OnExit = FramesPerSecondEditExit
  end
  object WidthEdit: TCSpinEdit
    Left = 230
    Top = 325
    Width = 65
    Height = 22
    TabStop = True
    MaxValue = 9999999
    MinValue = 1
    ParentColor = False
    TabOrder = 16
    Value = 720
    OnChange = FramesPerSecondEditChange
  end
  object HeightEdit: TCSpinEdit
    Left = 344
    Top = 325
    Width = 65
    Height = 22
    TabStop = True
    MaxValue = 9999999
    MinValue = 1
    ParentColor = False
    TabOrder = 17
    Value = 480
    OnChange = FramesPerSecondEditChange
  end
  object StatusBar2: TStatusBar
    Left = 0
    Top = 485
    Width = 742
    Height = 19
    Color = clInactiveCaption
    Panels = <
      item
        Style = psOwnerDraw
        Text =
          'Click '#39'Add Image Files'#39' to add Bitmaps or JPEG files to the comp' +
          'ilation list.'
        Width = 550
      end
      item
        Style = psOwnerDraw
        Text = 'Video Length: ?'
        Width = 50
      end>
    SimplePanel = False
    OnDrawPanel = StatusBar2DrawPanel
  end
  object AspectChkBox: TCheckBox
    Left = 560
    Top = 173
    Width = 13
    Height = 13
    Cursor = crHandPoint
    Caption = 'AspectChkBox'
    Checked = True
    State = cbChecked
    TabOrder = 5
    OnClick = AspectChkBoxClick
  end
  object ZoomInChkBox: TCheckBox
    Left = 560
    Top = 189
    Width = 13
    Height = 13
    Cursor = crHandPoint
    Caption = 'ZoomInChkBox'
    Checked = True
    State = cbChecked
    TabOrder = 6
    OnClick = ZoomInChkBoxClick
  end
  object OpenBackPicBtn: TBitBtn
    Left = 568
    Top = 128
    Width = 153
    Height = 25
    Caption = 'Open Background &Pic...'
    TabOrder = 4
    OnClick = OpenBackPicBtnClick
  end
  object BorderSizeWidthEdit: TCSpinEdit
    Left = 673
    Top = 221
    Width = 48
    Height = 22
    TabStop = True
    MaxValue = 99
    ParentColor = False
    TabOrder = 7
    Value = 10
    OnChange = BorderSizeWidthEditChange
    OnMouseMove = BorderSizeWidthEditMouseMove
  end
  object BorderSizeHeightEdit: TCSpinEdit
    Left = 673
    Top = 245
    Width = 48
    Height = 22
    TabStop = True
    MaxValue = 99
    ParentColor = False
    TabOrder = 8
    Value = 5
    OnChange = BorderSizeHeightEditChange
    OnMouseMove = BorderSizeHeightEditMouseMove
  end
  object MediaTypeCBox: TComboBox
    Left = 416
    Top = 325
    Width = 129
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      'Custom'
      'DVD NTSC 720x480'
      'DVD PAL 720x576'
      'SVCD NTSC 480x480'
      'SVCD PAL 480x576'
      'VCD NTSC 352x240'
      'VCD PAL 352x240')
    TabOrder = 18
    OnChange = MediaTypeCBoxChange
  end
  object RepeatValueEdit: TEdit
    Left = 120
    Top = 357
    Width = 57
    Height = 21
    TabOrder = 19
    Text = '1.000'
    OnChange = RepeatValueEditChange
    OnExit = RepeatValueEditExit
  end
  object RepeatSecondsEdit: TEdit
    Left = 344
    Top = 357
    Width = 65
    Height = 21
    ParentShowHint = False
    ShowHint = True
    TabOrder = 20
    Text = '0.033366700033366700033366700033367'
    OnChange = RepeatSecondsEditChange
    OnExit = RepeatSecondsEditExit
  end
  object PixelFormCBox: TComboBox
    Left = 624
    Top = 277
    Width = 73
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      '32 bit'
      '24 bit'
      '8 bit')
    TabOrder = 9
    OnChange = PixelFormCBoxChange
  end
  object OpenAudioDlg: TOpenDialog
    DefaultExt = '.wav'
    Filter = 'WAV files (*.wav)|*.wav'
    InitialDir = 'c:\My Documents'
    Left = 208
    Top = 416
  end
  object SaveDlg: TSaveDialog
    DefaultExt = '.avi'
    FileName = 'output.avi'
    Filter = 'AVI File (*.avi)|*.avi'
    InitialDir = 'C:\My Documents'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 240
    Top = 416
  end
  object MainMenu1: TMainMenu
    Left = 272
    Top = 416
    object File1: TMenuItem
      Caption = '&File'
      object ExitBtn: TMenuItem
        Caption = 'E&xit'
        OnClick = ExitBtnClick
      end
    end
    object ImageList1: TMenuItem
      Caption = 'Image &List'
      OnClick = ImageList1Click
      object AddImageFilesBtn2: TMenuItem
        Bitmap.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777788887
          7777777777444487777777777744448777777777774444877777777777444487
          7777778888444488888874444444444444487444444444444448744444444444
          4448744444444444444777777744448777777777774444877777777777444487
          7777777777444487777777777744447777777777777777777777}
        Caption = 'A&dd Image Files...'
        ShortCut = 112
        OnClick = AddBtnClick
      end
      object SortBtn2: TMenuItem
        Bitmap.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          1800000000000003000000000000000000000000000000000000C0C0C0C0C0C0
          808080808080808080808080808080808080C0C0C0C0C0C0C0C0C0C0C0C08080
          80C0C0C0C0C0C0C0C0C0C0C0C000008000008000008000008000008000008080
          8080C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0000080
          000080808080C0C0C0C0C0C0000080C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
          80808080C0C0C0C0C0C0C0C0C0C0C0C0000080000080808080C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0FF0000FF0000FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0
          C0C0C0000080000080808080C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF00
          00808080808080C0C0C0C0C0C0C0C0C0808080C0C0C000008000008080808080
          8080C0C0C0FF0000FF0000FF0000FF0000FF0000C0C0C0C0C0C0C0C0C0000080
          808080808080808080000080000080808080C0C0C0C0C0C0C0C0C0FF00008080
          80C0C0C0C0C0C0C0C0C0C0C0C0000080000080000080000080000080000080C0
          C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          808080808080808080C0C0C0808080808080808080C0C0C0C0C0C0FF00008080
          80C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000C0C0C080800080800080
          8000C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          808000808080C0C0C0C0C0C0808000808080C0C0C0C0C0C0C0C0C0FF00008080
          80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000808000808000C0
          C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          C0C0C0808000C0C0C0808000808080C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
          80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0C0FF0000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          C0C0C0C0C0C0808000808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF00008080
          80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808000C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0C0FF0000C0C0C0C0C0C0C0C0C0C0C0C0}
        Caption = '&Sort Image List'
        ShortCut = 16463
        OnClick = SortBtnClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object DeleteSelectedBtn2: TMenuItem
        Bitmap.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777070707070
          7777777767474747777777707070707077777777677747477777777070707070
          7777777767774747777777707070707077777777677747477777777070707070
          7777777767774747777777707070707077777707070707070777777677747474
          7777770707070707077777777074707777777777770707777777}
        Caption = 'D&elete Selected Image(s)'
        ShortCut = 8238
        OnClick = DeleteBtnClick
      end
      object SelectAllBtn: TMenuItem
        Caption = 'Se&lect All'
        ShortCut = 16449
        OnClick = SelectAllBtnClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object HelpBtn: TMenuItem
        Bitmap.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          1800000000000003000000000000000000000000000000000000BFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF
          0000FF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF808080808080BFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF
          0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF
          0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBF808080808080BFBFBFFF0000FF0000808080BFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000BFBFBFBF
          BFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFFF0000FF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF00008080
          80808080BFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBF
          FF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF00
          00808080BFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBF
          FF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF00
          00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBF
          BFBFBFBFBFBFBFBFFF0000FF0000808080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFFF0000FF0000FF0000FF0000FF0000FF0000FF0000808080BFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF0000FF0000FF
          0000FF0000FF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF}
        Caption = '&Help'
        OnClick = HelpBtnClick
      end
      object AboutBtn: TMenuItem
        Caption = 'A&bout...'
        OnClick = AboutBtnClick
      end
    end
  end
  object OpenPicDlg: TOpenPictureDialog
    Filter =
      'All (*.jpg;*.jpeg;*.bmp;*.gif)|*.jpg;*.jpeg;*.bmp;*.gif|Bitmaps ' +
      '(*.bmp)|*.bmp|JPEG Files (*.jpg;*.jpeg)|*.jpg;*.jpeg|GIF (*.gif)' +
      '|*.gif'
    InitialDir = 'Backgrounds'
    Left = 176
    Top = 416
  end
end